Average Images

s = Sys.time()
map(1:22, ~draw_ave(info$Index[info$emotion_idx==.x], with(info, emotion_cat %>% unique)[.x]))

## [[1]]
## Image 
##   colorMode    : Color 
##   storage.mode : double 
##   dim          : 881 661 3 
##   frames.total : 3 
##   frames.render: 1 
## 
## imageData(object)[1:5,1:6,1]
##           [,1]      [,2]      [,3]      [,4]      [,5]      [,6]
## [1,] 0.7751210 0.7750545 0.7749644 0.7748119 0.7750731 0.7758178
## [2,] 0.7750435 0.7752517 0.7753854 0.7752765 0.7754754 0.7760818
## [3,] 0.7752529 0.7755043 0.7756589 0.7757157 0.7758724 0.7763648
## [4,] 0.7753328 0.7756130 0.7757983 0.7759520 0.7761506 0.7765316
## [5,] 0.7752498 0.7754909 0.7757153 0.7759360 0.7761909 0.7764476
## 
## [[2]]
## Image 
##   colorMode    : Color 
##   storage.mode : double 
##   dim          : 881 661 3 
##   frames.total : 3 
##   frames.render: 1 
## 
## imageData(object)[1:5,1:6,1]
##           [,1]      [,2]      [,3]      [,4]      [,5]      [,6]
## [1,] 0.7833849 0.7833121 0.7829872 0.7828406 0.7827154 0.7825286
## [2,] 0.7822616 0.7821155 0.7818295 0.7816588 0.7814931 0.7813050
## [3,] 0.7812947 0.7811187 0.7807902 0.7804692 0.7801846 0.7801064
## [4,] 0.7804165 0.7801898 0.7798927 0.7794181 0.7789864 0.7789672
## [5,] 0.7798028 0.7793845 0.7790331 0.7784745 0.7780608 0.7780652
## 
## [[3]]
## Image 
##   colorMode    : Color 
##   storage.mode : double 
##   dim          : 881 661 3 
##   frames.total : 3 
##   frames.render: 1 
## 
## imageData(object)[1:5,1:6,1]
##           [,1]      [,2]      [,3]      [,4]      [,5]      [,6]
## [1,] 0.7840207 0.7845490 0.7847183 0.7849332 0.7849054 0.7847000
## [2,] 0.7841916 0.7845751 0.7847218 0.7849666 0.7850114 0.7848277
## [3,] 0.7843261 0.7846260 0.7846893 0.7849252 0.7850056 0.7848467
## [4,] 0.7842864 0.7845845 0.7846489 0.7848755 0.7848803 0.7847244
## [5,] 0.7839616 0.7842333 0.7843142 0.7844905 0.7845068 0.7844526
## 
## [[4]]
## Image 
##   colorMode    : Color 
##   storage.mode : double 
##   dim          : 881 661 3 
##   frames.total : 3 
##   frames.render: 1 
## 
## imageData(object)[1:5,1:6,1]
##           [,1]      [,2]      [,3]      [,4]      [,5]      [,6]
## [1,] 0.7878107 0.7877214 0.7871513 0.7871041 0.7875445 0.7879768
## [2,] 0.7877854 0.7877447 0.7870780 0.7868276 0.7870573 0.7874416
## [3,] 0.7873776 0.7875212 0.7872106 0.7870249 0.7871750 0.7875193
## [4,] 0.7867894 0.7871052 0.7872906 0.7873063 0.7874019 0.7876060
## [5,] 0.7862577 0.7867506 0.7871576 0.7873388 0.7873581 0.7873409
## 
## [[5]]
## Image 
##   colorMode    : Color 
##   storage.mode : double 
##   dim          : 881 661 3 
##   frames.total : 3 
##   frames.render: 1 
## 
## imageData(object)[1:5,1:6,1]
##           [,1]      [,2]      [,3]      [,4]      [,5]      [,6]
## [1,] 0.7738079 0.7741576 0.7746717 0.7754177 0.7762636 0.7768493
## [2,] 0.7740016 0.7742210 0.7745660 0.7750690 0.7756482 0.7760054
## [3,] 0.7740246 0.7741758 0.7743469 0.7746365 0.7750096 0.7752360
## [4,] 0.7737654 0.7738867 0.7739650 0.7741263 0.7743362 0.7745048
## [5,] 0.7735369 0.7736178 0.7736066 0.7736727 0.7738188 0.7740170
## 
## [[6]]
## Image 
##   colorMode    : Color 
##   storage.mode : double 
##   dim          : 881 661 3 
##   frames.total : 3 
##   frames.render: 1 
## 
## imageData(object)[1:5,1:6,1]
##           [,1]      [,2]      [,3]      [,4]      [,5]      [,6]
## [1,] 0.7815254 0.7820743 0.7824227 0.7823714 0.7822548 0.7818793
## [2,] 0.7816309 0.7820103 0.7821932 0.7820189 0.7817808 0.7813375
## [3,] 0.7814200 0.7816034 0.7815578 0.7812438 0.7809610 0.7805723
## [4,] 0.7809956 0.7810189 0.7807954 0.7803466 0.7799740 0.7796624
## [5,] 0.7803315 0.7804152 0.7803074 0.7800099 0.7797074 0.7796154
## 
## [[7]]
## Image 
##   colorMode    : Color 
##   storage.mode : double 
##   dim          : 881 661 3 
##   frames.total : 3 
##   frames.render: 1 
## 
## imageData(object)[1:5,1:6,1]
##           [,1]      [,2]      [,3]      [,4]      [,5]      [,6]
## [1,] 0.7861880 0.7859765 0.7857741 0.7854014 0.7852417 0.7852813
## [2,] 0.7855461 0.7852163 0.7849507 0.7846425 0.7845355 0.7846485
## [3,] 0.7846383 0.7842931 0.7841188 0.7839959 0.7840740 0.7843046
## [4,] 0.7839093 0.7835636 0.7834122 0.7833373 0.7833675 0.7836222
## [5,] 0.7834625 0.7831969 0.7830048 0.7829186 0.7828567 0.7830115
## 
## [[8]]
## Image 
##   colorMode    : Color 
##   storage.mode : double 
##   dim          : 881 661 3 
##   frames.total : 3 
##   frames.render: 1 
## 
## imageData(object)[1:5,1:6,1]
##           [,1]      [,2]      [,3]      [,4]      [,5]      [,6]
## [1,] 0.7789348 0.7787928 0.7786095 0.7783981 0.7781219 0.7780892
## [2,] 0.7787783 0.7786636 0.7784783 0.7782950 0.7780242 0.7779794
## [3,] 0.7788196 0.7787831 0.7786645 0.7785021 0.7782304 0.7780914
## [4,] 0.7789788 0.7789171 0.7788244 0.7786580 0.7783892 0.7781310
## [5,] 0.7787830 0.7787114 0.7786315 0.7784958 0.7783073 0.7780785
## 
## [[9]]
## Image 
##   colorMode    : Color 
##   storage.mode : double 
##   dim          : 881 661 3 
##   frames.total : 3 
##   frames.render: 1 
## 
## imageData(object)[1:5,1:6,1]
##           [,1]      [,2]      [,3]      [,4]      [,5]      [,6]
## [1,] 0.7943218 0.7942214 0.7938979 0.7933525 0.7930149 0.7928715
## [2,] 0.7941384 0.7940641 0.7937822 0.7932992 0.7928682 0.7927647
## [3,] 0.7940578 0.7940681 0.7938336 0.7933728 0.7929384 0.7928213
## [4,] 0.7939112 0.7940137 0.7939166 0.7935774 0.7932168 0.7929824
## [5,] 0.7938483 0.7939308 0.7938995 0.7937266 0.7935054 0.7931975
## 
## [[10]]
## Image 
##   colorMode    : Color 
##   storage.mode : double 
##   dim          : 881 661 3 
##   frames.total : 3 
##   frames.render: 1 
## 
## imageData(object)[1:5,1:6,1]
##           [,1]      [,2]      [,3]      [,4]      [,5]      [,6]
## [1,] 0.7940289 0.7936997 0.7935819 0.7936059 0.7937778 0.7939093
## [2,] 0.7937336 0.7934702 0.7934404 0.7935029 0.7935112 0.7934767
## [3,] 0.7934799 0.7932418 0.7932002 0.7932399 0.7932335 0.7931429
## [4,] 0.7931162 0.7929622 0.7929441 0.7929319 0.7929365 0.7929195
## [5,] 0.7927253 0.7926008 0.7926802 0.7927581 0.7928705 0.7929571
## 
## [[11]]
## Image 
##   colorMode    : Color 
##   storage.mode : double 
##   dim          : 881 661 3 
##   frames.total : 3 
##   frames.render: 1 
## 
## imageData(object)[1:5,1:6,1]
##           [,1]      [,2]      [,3]      [,4]      [,5]      [,6]
## [1,] 0.7862758 0.7862425 0.7861337 0.7861102 0.7860216 0.7860209
## [2,] 0.7860470 0.7859673 0.7858561 0.7858971 0.7859381 0.7860171
## [3,] 0.7859218 0.7857335 0.7855644 0.7855902 0.7857735 0.7859642
## [4,] 0.7856700 0.7855912 0.7854359 0.7854690 0.7856994 0.7858340
## [5,] 0.7855512 0.7854235 0.7851792 0.7851394 0.7853954 0.7856478
## 
## [[12]]
## Image 
##   colorMode    : Color 
##   storage.mode : double 
##   dim          : 881 661 3 
##   frames.total : 3 
##   frames.render: 1 
## 
## imageData(object)[1:5,1:6,1]
##           [,1]      [,2]      [,3]      [,4]      [,5]      [,6]
## [1,] 0.7831287 0.7833584 0.7833625 0.7831622 0.7828367 0.7827407
## [2,] 0.7823742 0.7826198 0.7828408 0.7828683 0.7827402 0.7826787
## [3,] 0.7818948 0.7821371 0.7824515 0.7826674 0.7826853 0.7827470
## [4,] 0.7816268 0.7819388 0.7823149 0.7825703 0.7826126 0.7827883
## [5,] 0.7816782 0.7820878 0.7823925 0.7824880 0.7825806 0.7828747
## 
## [[13]]
## Image 
##   colorMode    : Color 
##   storage.mode : double 
##   dim          : 881 661 3 
##   frames.total : 3 
##   frames.render: 1 
## 
## imageData(object)[1:5,1:6,1]
##           [,1]      [,2]      [,3]      [,4]      [,5]      [,6]
## [1,] 0.7892052 0.7892929 0.7892751 0.7892065 0.7893098 0.7891749
## [2,] 0.7889912 0.7890559 0.7889084 0.7887121 0.7887549 0.7887158
## [3,] 0.7893168 0.7892894 0.7888989 0.7885375 0.7884178 0.7884351
## [4,] 0.7895292 0.7893690 0.7887361 0.7881856 0.7878427 0.7878310
## [5,] 0.7889784 0.7886989 0.7881332 0.7877396 0.7874545 0.7874001
## 
## [[14]]
## Image 
##   colorMode    : Color 
##   storage.mode : double 
##   dim          : 881 661 3 
##   frames.total : 3 
##   frames.render: 1 
## 
## imageData(object)[1:5,1:6,1]
##           [,1]      [,2]      [,3]      [,4]      [,5]      [,6]
## [1,] 0.7799413 0.7798953 0.7799535 0.7802167 0.7805081 0.7805158
## [2,] 0.7801562 0.7801277 0.7801641 0.7803702 0.7806642 0.7806593
## [3,] 0.7802883 0.7802177 0.7802518 0.7804536 0.7807962 0.7807689
## [4,] 0.7801700 0.7800661 0.7801867 0.7804400 0.7808135 0.7808828
## [5,] 0.7799324 0.7799513 0.7801427 0.7803509 0.7806284 0.7806864
## 
## [[15]]
## Image 
##   colorMode    : Color 
##   storage.mode : double 
##   dim          : 881 661 3 
##   frames.total : 3 
##   frames.render: 1 
## 
## imageData(object)[1:5,1:6,1]
##           [,1]      [,2]      [,3]      [,4]      [,5]      [,6]
## [1,] 0.7783771 0.7784505 0.7783611 0.7780466 0.7777491 0.7777997
## [2,] 0.7779798 0.7782770 0.7783711 0.7781796 0.7779816 0.7780707
## [3,] 0.7775621 0.7779902 0.7782821 0.7782566 0.7781605 0.7782981
## [4,] 0.7772921 0.7778386 0.7782677 0.7784162 0.7784196 0.7785722
## [5,] 0.7771717 0.7776683 0.7780826 0.7782790 0.7783279 0.7785394
## 
## [[16]]
## Image 
##   colorMode    : Color 
##   storage.mode : double 
##   dim          : 881 661 3 
##   frames.total : 3 
##   frames.render: 1 
## 
## imageData(object)[1:5,1:6,1]
##           [,1]      [,2]      [,3]      [,4]      [,5]      [,6]
## [1,] 0.7837969 0.7841026 0.7846878 0.7851344 0.7854160 0.7856539
## [2,] 0.7833944 0.7835193 0.7837730 0.7838719 0.7840512 0.7843193
## [3,] 0.7830863 0.7830414 0.7830486 0.7830202 0.7832082 0.7835434
## [4,] 0.7829649 0.7828292 0.7826875 0.7826639 0.7828722 0.7832222
## [5,] 0.7829871 0.7828184 0.7826508 0.7826538 0.7827694 0.7829944
## 
## [[17]]
## Image 
##   colorMode    : Color 
##   storage.mode : double 
##   dim          : 881 661 3 
##   frames.total : 3 
##   frames.render: 1 
## 
## imageData(object)[1:5,1:6,1]
##           [,1]      [,2]      [,3]      [,4]      [,5]      [,6]
## [1,] 0.7828923 0.7831482 0.7832783 0.7831537 0.7830452 0.7829458
## [2,] 0.7834851 0.7836905 0.7838561 0.7837307 0.7835298 0.7834989
## [3,] 0.7839816 0.7842032 0.7844206 0.7843060 0.7840159 0.7838824
## [4,] 0.7843603 0.7845825 0.7848189 0.7847927 0.7845382 0.7843349
## [5,] 0.7845386 0.7847282 0.7847996 0.7847329 0.7846077 0.7843413
## 
## [[18]]
## Image 
##   colorMode    : Color 
##   storage.mode : double 
##   dim          : 881 661 3 
##   frames.total : 3 
##   frames.render: 1 
## 
## imageData(object)[1:5,1:6,1]
##           [,1]      [,2]      [,3]      [,4]      [,5]      [,6]
## [1,] 0.7755967 0.7756406 0.7753954 0.7752735 0.7751053 0.7750948
## [2,] 0.7752656 0.7754393 0.7752637 0.7752982 0.7753217 0.7754493
## [3,] 0.7749860 0.7753369 0.7753253 0.7754256 0.7755276 0.7756944
## [4,] 0.7746763 0.7751208 0.7751858 0.7753260 0.7755202 0.7757334
## [5,] 0.7743719 0.7748569 0.7749854 0.7751625 0.7754286 0.7757305
## 
## [[19]]
## Image 
##   colorMode    : Color 
##   storage.mode : double 
##   dim          : 881 661 3 
##   frames.total : 3 
##   frames.render: 1 
## 
## imageData(object)[1:5,1:6,1]
##           [,1]      [,2]      [,3]      [,4]      [,5]      [,6]
## [1,] 0.7847153 0.7849312 0.7850637 0.7852561 0.7857768 0.7863383
## [2,] 0.7842641 0.7846235 0.7849499 0.7853270 0.7858799 0.7860524
## [3,] 0.7837711 0.7841523 0.7845846 0.7850500 0.7856822 0.7859020
## [4,] 0.7834712 0.7837800 0.7842415 0.7847363 0.7853690 0.7856600
## [5,] 0.7832693 0.7834444 0.7837467 0.7840469 0.7845699 0.7849590
## 
## [[20]]
## Image 
##   colorMode    : Color 
##   storage.mode : double 
##   dim          : 881 661 3 
##   frames.total : 3 
##   frames.render: 1 
## 
## imageData(object)[1:5,1:6,1]
##           [,1]      [,2]      [,3]      [,4]      [,5]      [,6]
## [1,] 0.7880245 0.7883248 0.7885874 0.7889779 0.7891305 0.7892988
## [2,] 0.7880546 0.7885065 0.7888647 0.7892557 0.7894043 0.7895714
## [3,] 0.7881478 0.7885598 0.7888422 0.7891464 0.7892832 0.7894131
## [4,] 0.7881629 0.7883730 0.7884670 0.7885702 0.7887126 0.7889264
## [5,] 0.7880530 0.7880115 0.7879196 0.7879756 0.7880765 0.7881881
## 
## [[21]]
## Image 
##   colorMode    : Color 
##   storage.mode : double 
##   dim          : 881 661 3 
##   frames.total : 3 
##   frames.render: 1 
## 
## imageData(object)[1:5,1:6,1]
##           [,1]      [,2]      [,3]      [,4]      [,5]      [,6]
## [1,] 0.7895488 0.7899409 0.7901969 0.7903794 0.7904536 0.7903674
## [2,] 0.7893677 0.7897091 0.7899328 0.7900967 0.7901674 0.7901220
## [3,] 0.7893380 0.7896566 0.7897856 0.7898586 0.7898517 0.7898786
## [4,] 0.7896307 0.7899597 0.7899446 0.7898176 0.7896619 0.7897497
## [5,] 0.7899045 0.7901992 0.7900993 0.7898539 0.7895653 0.7896007
## 
## [[22]]
## Image 
##   colorMode    : Color 
##   storage.mode : double 
##   dim          : 881 661 3 
##   frames.total : 3 
##   frames.render: 1 
## 
## imageData(object)[1:5,1:6,1]
##           [,1]      [,2]      [,3]      [,4]      [,5]      [,6]
## [1,] 0.7874025 0.7871083 0.7865212 0.7863672 0.7866849 0.7870088
## [2,] 0.7871924 0.7869419 0.7863307 0.7860963 0.7863253 0.7864553
## [3,] 0.7870727 0.7869739 0.7864722 0.7861965 0.7862758 0.7862555
## [4,] 0.7871055 0.7871035 0.7866059 0.7862383 0.7862058 0.7861988
## [5,] 0.7867983 0.7869107 0.7865376 0.7862142 0.7861775 0.7862647

e = Sys.time()

e-s

## Time difference of 24.58056 mins